home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1997: The Complete Utilities Toolkit / macworld-complete-utilities-1997.iso / Programming / Bob 1.5 / t.bob < prev    next >
Encoding:
Text File  |  1993-10-02  |  213 b   |  12 lines  |  [TEXT/????]
  1. main()
  2. {
  3.     a = "ABCDabcd";
  4.     len = sizeof(a);
  5.     for (i = 0; i < len; ++i)
  6.     print(a[i],"\n");
  7.     for (i = 0; i < len; ++i)
  8.     if (a[i] >= 'a' && a[i] <= 'z')
  9.         a[i] = a[i] - 'a' + 'A';
  10.     print(a,"\n");
  11. }
  12.